home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / contrib / pdcurs22 / samples / testcurs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-01-26  |  14.9 KB  |  641 lines
  1. /*
  2. ***************************************************************************
  3. * This file comprises part of PDCurses. PDCurses is Public Domain software.
  4. * You may use this code for whatever purposes you desire. This software
  5. * is provided AS IS with NO WARRANTY whatsoever.
  6. * Should this software be used in another application, an acknowledgement
  7. * that PDCurses code is used would be appreciated, but is not mandatory.
  8. *
  9. * Any changes which you make to this software which may improve or enhance
  10. * it, should be forwarded to the current maintainer for the benefit of 
  11. * other users.
  12. *
  13. * The only restriction placed on this code is that no distribution of
  14. * modified PDCurses code be made under the PDCurses name, by anyone
  15. * other than the current maintainer.
  16. * 
  17. * See the file maintain.er for details of the current maintainer.
  18. ***************************************************************************
  19. */
  20. /*
  21.  *
  22.  * This is a test program for the PDCurses screen package for IBM PC type
  23.  * machines.
  24.  * This program was written by John Burnell (johnb@kea.am.dsir.govt.nz)
  25.  *
  26.  *  wrs(5/28/93) -- modified to be consistent (perform identically) with either
  27.  *                  PDCurses or under Unix System V, R4
  28.  *
  29.  */
  30.  
  31. #ifdef PDCDEBUG
  32. char *rcsid_testcurs  = "$Id$";
  33. #endif
  34.  
  35. #include <stdio.h>
  36. #include <curses.h>
  37.  
  38. #if defined(XCURSES)
  39.     char *XCursesProgramName = "testcurs";
  40. #endif
  41.  
  42. #ifdef __STDC__
  43. void inputTest (WINDOW *);
  44. void scrollTest (WINDOW *);
  45. void introTest (WINDOW *);
  46. int initTest (WINDOW **);
  47. void outputTest (WINDOW *);
  48. void padTest (WINDOW *);
  49. void display_menu(int,int);
  50. #  ifdef PDCURSES
  51. void resizeTest (WINDOW *);
  52. #  endif
  53. #else
  54. void inputTest ();
  55. void scrollTest ();
  56. void introTest ();
  57. int initTest ();
  58. void outputTest ();
  59. void padTest ();
  60. void display_menu();
  61. #  ifdef PDCURSES
  62. void resizeTest ();
  63. #  endif
  64. #endif
  65.  
  66. struct commands
  67. {
  68.  char *text;
  69. #ifdef __STDC__
  70.  void (*function)(WINDOW *);
  71. #else
  72.  void (*function)();
  73. #endif
  74. };
  75. typedef struct commands COMMAND;
  76. #ifdef PDCURSES
  77. #define MAX_OPTIONS 6
  78. #else
  79. #define MAX_OPTIONS 5
  80. #endif
  81. COMMAND command[MAX_OPTIONS] =
  82. {
  83.  {"Intro Test",introTest},
  84.  {"Pad Test",padTest},
  85. #ifdef PDCURSES
  86.  {"Resize Test",resizeTest},
  87. #endif
  88.  {"Scroll Test",scrollTest},
  89.  {"Input Test",inputTest},
  90.  {"Output Test",outputTest}
  91. };
  92.  
  93. int     width, height;
  94.  
  95. int main()
  96. {
  97. WINDOW  *win;
  98. int key,old_option=(-1),new_option=0;
  99. bool quit=FALSE;
  100.  
  101. #ifdef PDCDEBUG
  102.     PDC_debug("testcurs started\n");
  103. #endif
  104.     if (initTest (&win)) {return 1;}
  105.  
  106. #ifdef A_COLOR
  107.     if (has_colors())
  108.       {
  109.        init_pair(1,COLOR_WHITE,COLOR_BLUE);
  110.        wbkgd(win, COLOR_PAIR(1));
  111.       }
  112.     else
  113.        wbkgd(win, A_REVERSE);
  114. #else
  115.     wbkgd(win, A_REVERSE);
  116. #endif
  117.  
  118.     erase();
  119.     display_menu(old_option,new_option);
  120.     while(1)
  121.       {
  122.        noecho();
  123.        keypad(stdscr,TRUE);
  124.        raw();
  125.        key = getch();
  126.        switch(key)
  127.          {
  128.           case 10:
  129.           case 13:
  130.           case KEY_ENTER:
  131.                          erase();
  132.                          refresh();
  133.                          (*command[new_option].function)(win);
  134.                          erase();
  135.                          display_menu(old_option,new_option);
  136.                          break;
  137.           case KEY_UP:
  138.                          new_option = (new_option == 0) ? new_option : new_option-1;
  139.                          display_menu(old_option,new_option);
  140.                          break;
  141.           case KEY_DOWN:
  142.                          new_option = (new_option == MAX_OPTIONS-1) ? new_option : new_option+1;
  143.                          display_menu(old_option,new_option);
  144.                          break;
  145.           case 'Q':
  146.           case 'q':
  147.                          quit = TRUE;
  148.                          break;
  149.           default:       break;
  150.          }
  151.        if (quit == TRUE)
  152.           break;
  153.       }
  154.  
  155.     delwin (win);
  156.     endwin();
  157.     return 0;
  158. }
  159. #ifdef __STDC__
  160. void Continue (WINDOW *win)
  161. #else
  162. void Continue (win)
  163. WINDOW *win;
  164. #endif
  165. {
  166.     wmove(win, 10, 1);
  167.     wclrtoeol(win);
  168.     mvwaddstr(win, 10, 1, " Press any key to continue");
  169.     wrefresh(win);
  170.     raw();
  171.     wgetch(win);
  172. }
  173.  
  174. #ifdef __STDC_
  175. int initTest (WINDOW **win)
  176. #else
  177. int initTest (win)
  178. WINDOW **win;
  179. #endif
  180. {
  181. #ifdef PDCDEBUG
  182.     PDC_debug("initTest called\n");
  183. #endif
  184.     initscr();
  185. #ifdef PDCDEBUG
  186.     PDC_debug("after initscr()\n");
  187. #endif
  188. #ifdef A_COLOR
  189.     if (has_colors())
  190.        start_color();
  191. #endif
  192.     width  = 60;
  193.     height = 13;                /* Create a drawing window */
  194.     *win = newwin(height, width, (LINES-height)/2, (COLS-width)/2);
  195.     if(*win == NULL)
  196.     {   endwin();
  197.         return 1;
  198.     }
  199.     return(0);
  200. }
  201. #ifdef __STDC__
  202. void introTest (WINDOW *win)
  203. #else
  204. void introTest (win)
  205. WINDOW *win;
  206. #endif
  207. {
  208.     wmove( win, height/2-5, width/2 );
  209.     wvline( win, ACS_VLINE, 10 );
  210.     wmove( win, height/2, width/2-10 );
  211.     whline( win, ACS_HLINE, 20 );
  212.     Continue(win);
  213.  
  214.     beep ();
  215.     werase(win);
  216.  
  217.     box(win, ACS_VLINE, ACS_HLINE);
  218.     wrefresh(win);
  219.     cbreak ();
  220.     mvwaddstr(win, 1, 1, "You should have rectangle in the middle of the screen");
  221.     mvwaddstr(win, 2, 1, "You should have heard a beep");
  222.     Continue(win);
  223.     return;
  224. }
  225. #ifdef __STDC__
  226. void scrollTest (WINDOW *win)
  227. #else
  228. void scrollTest (win)
  229. WINDOW *win;
  230. #endif
  231. {
  232.     int i;
  233.     int OldX, OldY;
  234.     char *Message = "The window will now scroll slowly";
  235.  
  236. /* disable typeahead checking */
  237.  
  238.     typeahead(-1);
  239.  
  240.     mvwprintw (win, height - 2, 1, Message);
  241.     wrefresh (win);
  242.     scrollok(win, TRUE);
  243.     for (i = 1; i <= height; i++) {
  244.       napms (150);
  245.       scroll(win);
  246.       wrefresh (win);
  247.     };
  248.  
  249.     getmaxyx (win, OldY, OldX);
  250.     mvwprintw (win, 6, 1, "The top of the window will scroll");
  251.     wmove (win, 1, 1);
  252.     wsetscrreg (win, 0, 4);
  253.     box(win, ACS_VLINE, ACS_HLINE);
  254.     wrefresh (win);
  255.     for (i = 1; i <= 5; i++) 
  256.       {
  257.        napms (500);
  258.        scroll(win);
  259.        wrefresh (win);
  260.       }
  261.  
  262.     mvwprintw (win, 3, 1, "The bottom of the window will scroll");
  263.     wmove (win, 8, 1);
  264.     wsetscrreg (win, 5, --OldY);
  265.     box(win, ACS_VLINE, ACS_HLINE);
  266.     wrefresh (win);
  267.     for (i = 5; i <= OldY; i++) 
  268.       {
  269.        napms (300);
  270.        wscrl(win,-1);
  271.        wrefresh (win);
  272.       }
  273.     wsetscrreg (win, 0, OldY);
  274.  
  275. }
  276. #ifdef __STDC__
  277. void inputTest (WINDOW *win)
  278. #else
  279. void inputTest (win)
  280. WINDOW *win;
  281. #endif
  282. {
  283.     int w, h, bx, by, sw, sh, i, c,num;
  284.     char buffer [80];
  285.     WINDOW *subWin;
  286.     wclear (win);
  287.  
  288.     getmaxyx(win, h, w);
  289.     getbegyx(win, by, bx);
  290.  
  291.     sw = w / 3;
  292.     sh = h / 3;
  293.     if((subWin = subwin(win, sh, sw, by + h - sh - 2, bx + w - sw - 2)) == NULL)
  294.         return;
  295.  
  296. #ifdef A_COLOR
  297.     if (has_colors())
  298.       {
  299.        init_pair(2,COLOR_WHITE,COLOR_RED);
  300.        wbkgd(subWin, COLOR_PAIR(2) | A_BOLD);
  301.       }
  302.     else
  303.        wbkgd(subWin, A_BOLD);
  304. #else
  305.     wbkgd(subWin, A_BOLD);
  306. #endif
  307.     box(subWin, ACS_VLINE, ACS_HLINE);
  308.     wrefresh(win);
  309.  
  310.     nocbreak();
  311.     mvwaddstr(win, 2, 1, "Press some keys for 5 seconds");
  312.     mvwaddstr(win, 1, 1, "Pressing ^C should do nothing");
  313.     wrefresh(win);
  314.  
  315.     werase (subWin);
  316.     box(subWin, ACS_VLINE, ACS_HLINE);
  317.     for (i = 0; i < 5; i++) 
  318.       {
  319.        mvwprintw (subWin, 1, 1, "Time = %d", i);
  320.        wrefresh(subWin);
  321.        napms(1000);
  322.        flushinp();
  323.       }
  324.  
  325.     delwin (subWin);
  326.     werase(win);
  327.     flash();
  328.     wrefresh(win);
  329.     napms(500);
  330.     flushinp();
  331.  
  332.     mvwaddstr(win, 2, 1, "Press a key, followed by ENTER");
  333.     wmove(win, 9, 10);
  334.     wrefresh(win);
  335.     echo();
  336.     noraw();
  337.     wgetnstr(win, buffer, 3);
  338.     flushinp();
  339.  
  340.     wmove(win, 9, 10);
  341.     wdelch(win);
  342.     mvwaddstr(win, 4, 1, "The character should now have been deleted");
  343.     Continue(win);
  344.  
  345.     wclear (win);
  346.     mvwaddstr(win, 2, 1, "Press a function key or an arrow key");
  347.     wrefresh(win);
  348.     keypad(win, TRUE);
  349.     raw();
  350.     c = wgetch(win);
  351.  
  352.     nodelay(win, TRUE);
  353.     wgetch(win);
  354.     nodelay(win, FALSE);
  355.  
  356.     refresh();
  357.     wclear (win);
  358.     mvwaddstr(win, 3, 2, "The window should have moved");
  359.     mvwaddstr(win, 4, 2, "This text should have appeared without you pressing a key");
  360.     mvwprintw(win, 2, 2, "Keycode = %d", c);
  361.     mvwaddstr(win, 6, 2, "Enter a number then a string seperated by space");
  362.     mvwin(win, 2, 1);
  363.     wrefresh(win);
  364.     mvwscanw(win, 7, 6, "%d %s", &num,buffer);
  365.     mvwprintw(win, 8, 6, "String: %s Number: %d", buffer,num);
  366.     Continue(win);
  367. }
  368. #ifdef __STDC__
  369. void outputTest (WINDOW *win)
  370. #else
  371. void outputTest (win)
  372. WINDOW *win;
  373. #endif
  374. {
  375.     WINDOW *win1;
  376.     char Buffer [80];
  377.     chtype ch;
  378.     int by, bx;
  379.  
  380.     nl ();
  381.     wclear (win);
  382.     mvwaddstr(win, 1, 1, "You should now have a screen in the upper left corner, and this text should have wrapped");
  383.     waddstr(win,"\nThis text should be down\n");
  384.     waddstr(win,  "and broken into two here ^");
  385.     Continue(win);
  386.  
  387.     wclear(win);
  388.     wattron(win, A_BOLD);
  389.     mvwaddstr(win, 1, 1, "A new window will appear with this text in it");
  390.     mvwaddstr(win, 8, 1, "Press any key to continue");
  391.     wrefresh(win);
  392.     wgetch(win);
  393.  
  394.     getbegyx(win, by, bx);
  395.  
  396.     win1 = newwin(10, 50, 15, 25);
  397.     if(win1 == NULL)
  398.     {   endwin();
  399.         return;
  400.     }
  401. #ifdef A_COLOR
  402.     if (has_colors())
  403.       {
  404.        init_pair(3,COLOR_BLUE,COLOR_WHITE);
  405.        wbkgd(win1, COLOR_PAIR(3));
  406.       }
  407.     else
  408.        wbkgd(win1, A_NORMAL);
  409. #else
  410.     wbkgd(win1, A_NORMAL);
  411. #endif
  412.     wclear (win1);
  413.     mvwaddstr(win1, 5, 1, "This text should appear; using overlay option");
  414.     copywin(win, win1,0,0,0,0,9,49,TRUE);
  415.  
  416. #if defined(PDCURSES) && !defined(XCURSES)
  417.     box(win1,0xb3,0xc4);
  418. #else
  419.     box(win1,ACS_VLINE,ACS_HLINE);
  420. #endif
  421.     wmove(win1, 8, 26);
  422.     wrefresh(win1);
  423.     wgetch(win1);
  424.  
  425.     wclear(win1);
  426.     wattron(win1, A_BLINK);
  427.     mvwaddstr(win1, 4, 1, "This blinking text should appear in only the second window");
  428.     wattroff(win1, A_BLINK);
  429.     mvwin(win1, by, bx);
  430.     overlay(win, win1);
  431.     mvwin(win1,15,25);
  432.     wmove(win1, 8, 26);
  433.     wrefresh(win1);
  434.     wgetch(win1);
  435.     delwin(win1);
  436.  
  437.     clear();
  438.     wclear(win);
  439.     wrefresh(win);
  440.     mvwaddstr(win, 6, 2, "This line shouldn't appear");
  441.     mvwaddstr(win, 4, 2, "Only half of the next line is visible");
  442.     mvwaddstr(win, 5, 2, "Only half of the next line is visible");
  443.     wmove(win, 6, 1);
  444.     wclrtobot (win);
  445.     wmove(win, 5, 20);
  446.     wclrtoeol (win);
  447.     mvwaddstr(win, 8, 2, "This line also shouldn't appear");
  448.     wmove(win, 8, 1);
  449.     winsdelln(win,-1);
  450.     Continue(win);
  451.  
  452.     wmove (win, 5, 9);
  453.     ch = winch (win);
  454.  
  455.     wclear(win);
  456.     wmove (win, 6, 2);
  457.     waddstr (win, "The next char should be l:  ");
  458.     winsch (win, ch);
  459.     Continue(win);
  460.  
  461.     mvwinsstr( win, 6, 2, "A1B2C3D4E5" );
  462.     Continue(win);
  463.  
  464.     wmove(win, 5, 1);
  465.     winsdelln (win,1);
  466.     mvwaddstr(win, 5, 2, "The lines below should have moved down");
  467.     Continue(win);
  468.  
  469.     wclear(win);
  470.     wmove(win, 2, 2);
  471.     wprintw(win, "This is a formatted string in a window: %d %s\n", 42, "is it");
  472.     mvwaddstr(win, 10, 1, "Enter a string: ");
  473.     wrefresh(win);
  474.     echo();
  475.     wscanw (win, "%s", Buffer);
  476.  
  477.     printw("This is a formatted string in stdscr: %d %s\n", 42, "is it");
  478.     mvaddstr(10, 1, "Enter a string: ");
  479.     scanw ("%s", Buffer);
  480.  
  481.     wclear(win);
  482.     curs_set(2);
  483.     mvwaddstr(win, 1, 1, "The cursor should appear as a block");
  484.     Continue(win);
  485.  
  486.     wclear(win);
  487.     curs_set(0);
  488.     mvwaddstr(win, 1, 1, "The cursor should have disappeared");
  489.     Continue(win);
  490.  
  491.     wclear(win);
  492.     curs_set(1);
  493.     mvwaddstr(win, 1, 1, "The cursor should be an underline");
  494.     Continue(win);
  495.  
  496. #ifdef A_COLOR
  497.     if ( has_colors() )
  498.       {
  499.        wclear(win);
  500.        mvwaddstr(win, 1, 1, "Colors should change after you press a key");
  501.        Continue(win);
  502.        init_pair(1, COLOR_RED, COLOR_WHITE);
  503.        wrefresh(win);
  504.     }
  505. #endif
  506.  
  507.     werase(win);
  508.     mvwaddstr(win, 1, 1, "Information About Your Terminal");
  509.     mvwaddstr(win, 3, 1, termname());
  510.     mvwaddstr(win, 4, 1, longname());
  511.     if ( termattrs() & A_BLINK )
  512.        mvwaddstr(win,5, 1, "This terminal supports blinking.");
  513.     else
  514.        mvwaddstr(win,5, 1, "This terminal does NOT support blinking.");
  515.  
  516.     mvwaddnstr( win, 7,5, "Have a nice day!ok", 16 );
  517.     wrefresh(win);
  518.  
  519.     mvwinnstr( win, 7,5, Buffer, 18 );
  520.     mvaddstr( LINES-2, 10, Buffer );
  521.     refresh();
  522.     Continue(win);
  523. }
  524.  
  525. #ifdef PDCURSES
  526. #ifdef __STDC__
  527. void resizeTest(WINDOW *dummy)
  528. #else
  529. void resizeTest(dummy)
  530. WINDOW *dummy;
  531. #endif
  532. {
  533.     WINDOW *win1;
  534.     char Buffer [80];
  535.     chtype ch;
  536.  
  537.     savetty ();
  538.  
  539.     clear();
  540.     refresh();
  541. #ifdef __PDCURSES__
  542.     resize_screen(50);
  543. #endif
  544.  
  545.  
  546.     win1 = newwin(11, 50, 14, 25);
  547.     if(win1 == NULL)
  548.     {   endwin();
  549.         return;
  550.     }
  551. #ifdef A_COLOR
  552.     if (has_colors())
  553.       {
  554.        init_pair(3,COLOR_BLUE,COLOR_WHITE);
  555.        wattrset(win1, COLOR_PAIR(3));
  556.       }
  557. #endif
  558.     wclear (win1);
  559.  
  560.     mvwaddstr(win1, 1, 1, "The screen may now have 50 lines");
  561.     Continue(win1);
  562.  
  563.     resetty ();
  564.  
  565.     wclear (win1);
  566.     mvwaddstr(win1, 1, 1, "The screen should now be reset");
  567.     Continue(win1);
  568.  
  569.     delwin(win1);
  570.  
  571.     clear();
  572.     refresh();
  573.  
  574. }
  575. #endif
  576.  
  577. #ifdef __STDC__
  578. void padTest(WINDOW *dummy)
  579. #else
  580. void padTest(dummy)
  581. WINDOW *dummy;
  582. #endif
  583. {
  584. WINDOW *pad,*spad;
  585.  
  586.  pad = newpad(50,100);
  587.  wattron(pad, A_REVERSE);
  588.  mvwaddstr(pad, 5, 2, "This is a new pad");
  589.  wattrset(pad,0);
  590.  mvwaddstr(pad, 8, 0, "The end of this line should be truncated here:except  now");
  591.  mvwaddstr(pad,11, 1, "This line should not appear.It will now");
  592.  wmove(pad, 10, 1);
  593.  wclrtoeol(pad);
  594.  mvwaddstr(pad, 10, 1, " Press any key to continue");
  595.  prefresh(pad,0,0,0,0,10,45);
  596.  keypad(pad, TRUE);
  597.  raw();
  598.  wgetch(pad);
  599.  
  600.  spad = subpad(pad,12,25,6,52);
  601.  mvwaddstr(spad, 2, 2, "This is a new subpad");
  602.  box(spad,0,0);
  603.  prefresh(pad,0,0,0,0,15,75);
  604.  keypad(pad, TRUE);
  605.  raw();
  606.  wgetch(pad);
  607.  
  608.  mvwaddstr(pad, 35, 2, "This is displayed at line 35 in the pad");
  609.  mvwaddstr(pad, 40, 1, " Press any key to continue");
  610.  prefresh(pad,30,0,0,0,10,45);
  611.  keypad(pad, TRUE);
  612.  raw();
  613.  wgetch(pad);
  614.  
  615.  delwin(pad);
  616. }
  617.  
  618. #ifdef __STDC__
  619. void display_menu(int old_option,int new_option)
  620. #else
  621. void display_menu(old_option,new_option)
  622. int old_option,new_option;
  623. #endif
  624. {
  625.  register int i;
  626.  
  627.  attrset(A_NORMAL);
  628.  mvaddstr(3,20,"PDCurses Test Program");
  629.  
  630.  for (i=0;i<MAX_OPTIONS;i++)
  631.     mvaddstr(5+i,25,command[i].text);
  632.  if (old_option != (-1))
  633.     mvaddstr(5+old_option,25,command[old_option].text);
  634.  attrset(A_REVERSE);
  635.  mvaddstr(5+new_option,25,command[new_option].text);
  636.  attrset(A_NORMAL);
  637.  mvaddstr(13,3,"Use Up and Down Arrows to select - Enter to run - Q to quit");
  638.  refresh();
  639. }
  640.  
  641.